18 REHXXXX$X8****XXX****XX*XX*##$XX### 28 REMX X 38 REMX GMFP2 DEMU PRUGRAH USER ll/2 X 48 REHX ---------------------------- X 58 RHHX 8RIGIN¤TORl BATRHUBER TBF X 68 RHHX HDDIFIED : UENZIN HANETSCH X 78 REHX DATE : 18.HAI.19B6/HK III i-18 FQIEHX X 98 REMXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 188 Y1$¤"SMFPZ" 118 R¤1:8USUH 9888 128 Rx6:Y¤2:BGSuB988B :REH FH 138 R=71Y=3.5:G8SUH9888 QREH HAX.HGD. 148 Y1¤2!Y¤8:R¤28:GUSUB9888 158 Y1¤3:Y=8:R=28:GU5UB9888 168 Y1=4:Y=8:R=28:GUSUB9888 178 REH8XXXXXXXXXXXXXXXXXXXXXXXX l38 REHX X 198 REN? B E N D E R X 288 REHX :6::;;;::;: X 218 REHR X 228 REHXXX*******$XX#XXXXXX*XXXX 238: 248 GUSUH 3328 258 PRINT "E" 268 PRINT:PRINT:PRINT 278 PRINT“GERAETEDATEN" zaa r>r<1uT·· —--——--—-——--------------------- 4 ------ ··- 298 PRINT:PRINT:PRINT:PRINT 388 INPUT"BETRIEB5SPANNUNG IN VOLT =";B 318 Y3=2IY1=(B·8.1)IY2¤<B+8.1)LR¤35:GD5UE 9888 328 PRINT 338 H=35IGU$UB 9888 348 IF Y<Yi THEN 318 358 IF T>Y2 THEN 318 368 PRINT"BETRIE8SSPANNUNG M “TAE(25> Y "UDLT“ 378 PRINT 388 INPUT"ANZAHL HANAELE "JKQ 398 IF 8SD(K$)> 47 THEN 488 488 IF ASD(K$)< 58 THEN 438 418 PDKE 198,8ZPDKE 197,138:PUKE 196,568 AND 255 428 GUTG 388 438 H=ASD(H$J-43IIF K{1 THEN GBTD 388 448 Y1=2:Y=1:R=28:GUSUB9BB8 458 FUR L=1 TU K STEP 1 468 PRINT"E" 478 PRINT:PRINT:PRINT 458 PRINT"5ENDERTE5T“ 498 PRINT"-- --—--—-·— ·—·*· ···· ·· ···· ·· ·········· ” 588 PRIMT:PRIMT:PRINT:PRINT 518 PRINT 528 PRINT 538 INPUT"EIN5TELLEN HAHAL "jK$(L) 548 IF A5C(K${L>)> 47 THEN 558 558 IF ABC(K$(L>)< 5B THEN sas *568 PURE 198.8:PUKE 197.129 {POKE 196.488 RND 255 578 GUTD 538 538 PRINT: K(L)=§SC(H$(Ll>-48 598 PRINT 688 R=41IGD5UB9888:IF Y>8.1THEN BDT8 648 618 R¤48IGDSUB 9888 628 Y$="$ENDER HDCHTASTEN " 638 R¤E7:GG5UB9888 648 R=54:YE=2:G8SU898B8 658 IFTf.4THEN6B8